；；
力扣 868
给定一个正整数 n，找到并返回 n 的二进制表示中两个 相邻 1 之间的 最长距离 。如果不存在两个相邻的 1，返回 0 。
如果只有 0 将两个 1 分隔开（可能不存在 0 ），则认为这两个 1 彼此 相邻 。
两个 1 之间的距离是它们的二进制表示中位置的绝对差。例如，"1001" 中的两个 1 的距离为 3 。
；；

@进制转换 = @【#数，#进制】｛
    #结果：“”
    #当前值 = #数
    当 #当前值 大于 0 ｛
        #结果 = #当前值 % #进制 + #结果
        #当前值 = @转整数【#当前值 / #进制】
    ｝
    返回 #结果
｝

@二进制间距 = @【#数】｛
    #二进制值 = @进制转换【#数，2】
    @显示、#二进制值
    #间距：0
    #起：-1
    当 #序：0，#序 小于 @取长度【#二进制值】，#序 自加 1 ｛
        如果 #二进制值#序 等于 “1”｛
            如果 #起 不等于 #序 ｛
                如果 #起 等于 -1 ｛
                   #起 = #序
                ｝否则｛
                    如果 #序 - #起 - 1 大于 #间距 ｛
                        #间距 = #序 - #起 - 1
                    ｝
                    #起 = #序
                ｝
            ｝
        ｝
    ｝
    返回 #间距
｝

@显示、@二进制间距、100




